Top 10k strings from Computer Studies - Logic (1984)(Longman Software).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
15 8 8 8 6 5 4 3 3 3 3 2 BASIC AT WORK. 2 2 2 2 2 1 input G- 1 a$="WORK AT BASIC!": 1 WRITE YOUR 1 WORDGAME.......7500 1 Try other curve 1 TOTAL=TOTAL+D(I) 1 TO WATCH SORT 1 SORTING OUT 1 RIGHT GUESSES 1 PUTIN 1 NUMBERS INPUT 1 NUMBER ARRAY 1 NAME HERE. 1 N(J)=N(J+1 1 MEAN=TOTAL*10 1 MEAN...........7300 1 LIST the numbers 1 LINES 5050 & 5060 HAVE BEEN SWITCHED 1 INK COLOUR 1 IN RIGHT ORDER - JUMP 1 Have fun!! 1 GO COUNTER 1 FINDS THE MEAN OF 10 NUMBERS 1 FINAL FIGURES 1 FILLED CIRCLE 1 ENOUGH!YOU'VE LOST 1 DRAWS A CIRCLE IN 1 DATA can be corrected by reference to the table LISTed after the routine. (4140 on) 1 C;N(J);" "; 1 ADD GOSUB 1200 1 A$="STUDIES": 1 A$="PUTIN": 1 A$="PUNIT": 1 A$="OW BAA! TRICKS": 1 A$="COMPUTER": 1 >>THAT'S ALL << 1 ;R;"k";TAP 18;C$; 1 ;"LONGMAN SOFTWARE 1 ;" " 1 5150...THEN 1 5110 LET W$ 1 5090 GOTO 51 1 5070....LEN 1 5040..FOR 1 4050 PRINT 1 4040 READ M$,R,C 1 4030 FOR N=1 TO 1 3110 ...TOTAL 1 3050 PRINT D( 1 3010 DIM D(10) 1 2130 DRAW 1 2090 DRAW 1 2040 CIRCLE 127,87, 1 2010 PAPER 1 1;.. ... 1 1150 PRINT 1 1125 GOSUB 1200 1 1120 NEXT 1 1110 LET N(J 1 1080 IF N(J) 1 1040 READ 1 1010 RESTORE 1 . 1 ,"yes",776 1 ,"yes",2392 1 ,"yes",125 1 ''" There were 5 perfectly good"''" demonstration routines in this" 1 '" program. They all worked - "''" then the bugs got at them!!" 1 '" You will have to debug them"''" yourself - the bugs got the"''" programmer too...." 1 '" The bug-ridden routines start"''" at 1000,2000,3000,4000 & 5000." 1 '" The REMs will tell you what"''" they are supposed to do." 1 '" MACHINE RAM COLOUR? PRICE" 1 '" If you have trouble debugging"''" then LIST 6000." 1 "TOTAL..... 1 "TOTAL = ";TOTAL 1 "Spectrum",48 1 "RUN NUMBER ";I 1 "MEAN = ";MEAN 1 "ITV ""B""",399 1 "IBM II",48 1 "GUESS A LETTER ";G$ 1 "GIVE ME... 1 "GIVE ME A WORD ";W$ 1 "ENTRY ";I;"= "; 1 "DOUBLE WIDTH" 1 "DOUBLE HEIGHT" 1 "CBM 64",229 1 "APPLE PI",48 1 " The big rotten writings stop"," at 007, `5.95, 6.30 and No.10" 1 " The RAMs won't tell you what"," your supper is today." 1 " If you have double pea-pudding"," then LIST to starboard." 1 typing errors. 1 to go on 1 then LIST to starboard. G 1 the right key 1 the keyword 1 the INPUT quotes and ENTER 1 that won't work well? 1 start of each turn. 1 scroll to see how 1 scroll for notes 1 routine before looping to 1 on a single screen. 1 numbers on the 1 not in the right places! 1 more likely to give 1 it should appear. 1 is in the DATA lines - just 1 during a BEEP, or EDIT out 1 could be written in as DATA 1 but I wanted to keep it all 1 are easy to read,but 1 and READ at random at the 1 and PAPER colours. 1 ZX81 1k no `40 1 Worried about a word game 1 Try different INK 1 To end the game, BREAK in 1 This is rather a crude game 1 The words to be guessed 1 THE DRAWING 1 THE BUBBLE SORT 1 TABULAR DISPLAY - DATA 1 Spectrum 48k yes `125 1 PROGRAM READY - PRESS ANY KEY 1 PLOT & DRAW....7200 1 OVAL routine. 1 ON VARIOUS COMPUTERS. 1 MERCURIAN PULP PRODUCTS 1 MEAN SOMETING. 1 MAKING THE MEAN 1 MACHINE RAM COLOUR? PRICE 1 Long variable names 1 LIST 1000 for your first chore 1 Include an "Another go ?" 1 INPUT W$,to allow ending. 1 IN AN SQUARE. 1 IBM PC 64k yes `2392 1 HARDWARE DATA..7400 1 FOLLOWS. IT'S O.K.! 1 DISPLAY SUBROUTINE 1 DIAMOND,IN AN OVAL 1 DEBUGGING 1 DEBUGGED BY 1 COPYRIGHT 1984 1 CONTRACT BOOKS 1 CONFUSED COMPUTERS 1 CBM 64 64k yes `229 1 BUBBLE-SORT ROUTINE. 1 BUBBLE SORT....7100 1 BBC "B" 32k yes `399 1 All the necessary information 1 APPLE II 48k yes `776 1 AND TOTALLED 1 18;C$.... 1 ******************** * 1 Simple Word Game 1 FOLLOW THESE 1 ARE YOU STUCK?! 1 ARROWS. 1 * ******************** 1 * * 1 SEARCHING AND LOADING 1 INDEX 1 PLEASE WAIT " 1 have been switched 1 AND 1 TO USE THIS. 1 ************ 1 ************* 1 ********** 1 1 1 1 1 1 1 1 1 1 1 1 1